@echo off setlocal ENABLEDELAYEDEXPANSION mode con: cols=65 lines=25 color 0a rem 批处理获取管理员权限 :------------------------------------- %1 mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)&&exit /b CD /D "%~dp0" :------------------------------------- ::添加阻止程序出站规则 ( echo "Office_OfficeClickToRun","%ProgramFiles%\Common Files\microsoft shared\ClickToRun\OfficeClickToRun.exe" echo "Office_msoia","%ProgramFiles%\Microsoft Office\root\Office16\msoia.exe" echo "Office_WINWORD","%ProgramFiles%\Microsoft Office\root\Office16\WINWORD.EXE" echo "Office_EXCEL","%ProgramFiles%\Microsoft Office\root\Office16\EXCEL.EXE" echo "Office_POWERPNT","%ProgramFiles%\Microsoft Office\root\Office16\POWERPNT.EXE" echo "Office_VISIO","%ProgramFiles%\Microsoft Office\root\Office16\VISIO.EXE" echo "Office_WINPROJ","%ProgramFiles%\Microsoft Office\root\Office16\WINPROJ.EXE" echo "Office_MSPUB","%ProgramFiles%\Microsoft Office\root\Office16\MSPUB.EXE" echo "Office_MSACCESS","%ProgramFiles%\Microsoft Office\root\Office16\MSACCESS.EXE" echo "AutoCAD_LMU","%ProgramFiles%\Common Files\Autodesk Shared\AdLM\R11\LMU.exe" echo "AutoCAD_DADispatcherService","C:\Program Files\Autodesk\AutoCAD 2012\DADispatcherService.exe" echo "AutoCAD_acad","C:\Program Files\Autodesk\AutoCAD 2012\acad.exe" echo "apilogserver.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\apilogserver.exe" echo "cefpluginhost.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\cefpluginhost.exe" echo "et.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\et.exe" echo "kcrashdumper.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\kcrashdumper.exe" echo "ksolaunch.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\ksolaunch.exe" echo "ksomisc.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\ksomisc.exe" echo "KSOXMLED.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\KSOXMLED.exe" echo "transerr.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\transerr.exe" echo "wpp.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\wpp.exe" echo "wps.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\wps.exe" echo "wpscenter.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\wpscenter.exe" echo "wpscloudlaunch.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\wpscloudlaunch.exe" echo "wpscloudsvr.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\wpscloudsvr.exe" echo "WPSOfficePIA.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\WPSOfficePIA.exe" echo "wpsrenderer.exe","C:\Program Files (x86)\Kingsoft\WPS Office\10.8.0.6206\office6\wpsrenderer.exe" )>list.txt FOR /F "usebackq tokens=1,2 delims=," %%i in ( list.txt ) do ( netsh advfirewall firewall del rule name="%%i">nul 2>nul netsh advfirewall firewall add rule name="%%i" program=%%j action=block dir=out>nul echo 阻止%%i程序出站规则已添加 ) del list.txt ::添加阻止服务出站规则 ( echo "Windows Update","wuauserv" )>list.txt set svchost_exe="%%systemroot%%\system32\svchost.exe" FOR /F "usebackq tokens=1,2 delims=," %%i in ( list.txt ) do ( netsh advfirewall firewall del rule name=%%i>nul 2>nul netsh advfirewall firewall add rule name=%%i service=%%j action=block dir=out program="%svchost_exe%">nul echo 阻止%%i服务出站规则已添加 ) del list.txt pause